I want to analyse South Park. But where do I start?

Data acquired. BINGO! Let’s dig in.

Let’s dig deeper and get sentimental!

gg <- ggplot(by_episode, aes(episode_number, mean_sentiment_score, group = 1, text = text_sent)) +
    geom_col(color = "#592a88") +
    geom_smooth()

ggplotly(gg, tooltip = "text")

Conclusion